object TreeEditor: TTreeEditor
  Left = 129
  Top = 137
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Editeur d'#39'écrans'
  ClientHeight = 547
  ClientWidth = 587
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Label7: TLabel
    Left = 12
    Top = 2
    Width = 93
    Height = 13
    Caption = 'Version de la DFM :'
  end
  object ScrVersion: TLabel
    Left = 108
    Top = 2
    Width = 3
    Height = 13
  end
  object GroupBox1: TGroupBox
    Left = 271
    Top = 2
    Width = 219
    Height = 107
    Caption = 'Ajouter / supprimer un écran'
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object ScrMoveUp: TSpeedButton
      Left = 12
      Top = 18
      Width = 21
      Height = 25
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
        3333333333777F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
        3333333777737777F333333099999990333333373F3333373333333309999903
        333333337F33337F33333333099999033333333373F333733333333330999033
        3333333337F337F3333333333099903333333333373F37333333333333090333
        33333333337F7F33333333333309033333333333337373333333333333303333
        333333333337F333333333333330333333333333333733333333}
      NumGlyphs = 2
      OnClick = ScrMoveUpClick
    end
    object ScrMoveDown: TSpeedButton
      Left = 8
      Top = 72
      Width = 25
      Height = 25
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000001000000010000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
        333333333337F33333333333333033333333333333373F333333333333090333
        33333333337F7F33333333333309033333333333337373F33333333330999033
        3333333337F337F33333333330999033333333333733373F3333333309999903
        333333337F33337F33333333099999033333333373333373F333333099999990
        33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333309033333333333337F7F333333333333090333
        33333333337F7F33333333333300033333333333337773333333}
      NumGlyphs = 2
      OnClick = ScrMoveDownClick
    end
    object BtnAjouterElementt: TBitBtn
      Left = 35
      Top = 18
      Width = 175
      Height = 25
      Caption = 'Ajouter un élement'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = BtnAjouterElementtClick
    end
    object BtnAjouterSousElement: TBitBtn
      Left = 35
      Top = 45
      Width = 175
      Height = 25
      Caption = 'Ajouter un sous-élément'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BtnAjouterSousElementClick
    end
    object BtnSupprimer: TBitBtn
      Left = 35
      Top = 72
      Width = 175
      Height = 25
      Caption = 'Supprimer'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = BtnSupprimerClick
    end
  end
  object GroupInformations: TGroupBox
    Left = 271
    Top = 112
    Width = 310
    Height = 405
    Caption = 'Informations'
    Font.Charset = ANSI_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 21
      Width = 76
      Height = 13
      Caption = 'Titre de l'#39'écran :'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 10
      Top = 69
      Width = 25
      Height = 13
      Caption = 'Tag :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object ScrTag: TLabel
      Left = 132
      Top = 69
      Width = 35
      Height = 13
      Alignment = taRightJustify
      Caption = 'ScrTag'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 10
      Top = 85
      Width = 59
      Height = 13
      Caption = 'Tag Parent :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object ScrTagParent: TLabel
      Left = 101
      Top = 85
      Width = 66
      Height = 13
      Alignment = taRightJustify
      Caption = 'ScrTagParent'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 10
      Top = 106
      Width = 62
      Height = 13
      Caption = 'Class Name :'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 8
      Top = 43
      Width = 86
      Height = 13
      Caption = 'Define de l'#39'écran :'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 86
      Top = 129
      Width = 59
      Height = 29
      Alignment = taCenter
      AutoSize = False
      Caption = 'Tag GroupBox'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object ScrChoice: TSpeedButton
      Left = 279
      Top = 103
      Width = 22
      Height = 22
      Enabled = False
      Glyph.Data = {
        96000000424D9600000000000000760000002800000008000000080000000100
        0400000000002000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        FFFFFFFFFFFF00F00F0000F00F00FFFFFFFFFFFFFFFFFFFFFFFF}
      OnClick = ScrChoiceClick
    end
    object Label8: TLabel
      Left = 30
      Top = 153
      Width = 39
      Height = 26
      Alignment = taCenter
      Caption = 'Modif Création'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object Label9: TLabel
      Left = 10
      Top = 241
      Width = 40
      Height = 13
      Caption = 'KeyField'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 10
      Top = 263
      Width = 38
      Height = 13
      Caption = 'ListField'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 57
      Top = 284
      Width = 33
      Height = 13
      Caption = 'Mode :'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 6
      Top = 219
      Width = 50
      Height = 13
      Caption = 'FieldName'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label13: TLabel
      Left = 109
      Top = 161
      Width = 27
      Height = 13
      Caption = 'Lettre'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label14: TLabel
      Left = 204
      Top = 130
      Width = 38
      Height = 26
      Alignment = taCenter
      Caption = 'Custom icone'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object ScrName: TEdit
      Left = 98
      Top = 19
      Width = 203
      Height = 21
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnChange = ScrNameChange
    end
    object ScrVisible: TCheckBox
      Left = 10
      Top = 121
      Width = 67
      Height = 17
      Caption = 'Visible'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = ScrVisibleClick
    end
    object ScrEnabled: TCheckBox
      Left = 10
      Top = 136
      Width = 67
      Height = 17
      Caption = 'Enabled'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = ScrEnabledClick
    end
    object ScrWinStyle: TRadioGroup
      Left = 9
      Top = 297
      Width = 201
      Height = 97
      Caption = 'Type écran'
      Columns = 2
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      Items.Strings = (
        'Elmt Cour.'
        'Menu'
        'Saisie M.'
        'Affichage M.'
        'Edition M.'
        'Courrier M.'
        'Liste'
        'Saisie L.'
        'Affichage L.'
        'Edition L.'
        'Courrier L.')
      ParentFont = False
      TabOrder = 3
      OnClick = ScrWinStyleClick
    end
    object ScrDefineName: TEdit
      Left = 98
      Top = 40
      Width = 203
      Height = 21
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnChange = ScrDefineNameChange
    end
    object Edit1: TEdit
      Left = 145
      Top = 131
      Width = 35
      Height = 21
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
      Text = '100'
    end
    object ScrTagMenu: TUpDown
      Left = 180
      Top = 131
      Width = 12
      Height = 21
      Associate = Edit1
      Enabled = False
      Min = 100
      Max = 109
      Position = 100
      TabOrder = 6
      Wrap = False
      OnClick = ScrTagMenuClick
    end
    object ScrCreation: TCheckBox
      Left = 10
      Top = 158
      Width = 17
      Height = 17
      Enabled = False
      TabOrder = 7
      OnClick = ScrCreationClick
    end
    object ScrKeyField: TEdit
      Left = 60
      Top = 238
      Width = 242
      Height = 21
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 8
      OnChange = ScrKeyFieldChange
    end
    object ScrListField: TEdit
      Left = 60
      Top = 260
      Width = 242
      Height = 21
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 9
      OnChange = ScrListFieldChange
    end
    object ScrClassName: TEdit
      Left = 74
      Top = 103
      Width = 206
      Height = 21
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 10
      OnChange = ScrClassNameChange
    end
    object ScrModeBit7: TCheckBox
      Left = 198
      Top = 282
      Width = 15
      Height = 17
      Caption = 'CheckBox1'
      Enabled = False
      TabOrder = 11
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit6: TCheckBox
      Left = 211
      Top = 282
      Width = 15
      Height = 17
      Caption = 'CheckBox2'
      Enabled = False
      TabOrder = 12
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit5: TCheckBox
      Left = 224
      Top = 282
      Width = 15
      Height = 17
      Caption = 'CheckBox3'
      Enabled = False
      TabOrder = 13
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit4: TCheckBox
      Left = 237
      Top = 282
      Width = 15
      Height = 17
      Caption = 'CheckBox4'
      Enabled = False
      TabOrder = 14
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit3: TCheckBox
      Left = 250
      Top = 282
      Width = 15
      Height = 17
      Caption = 'CheckBox5'
      Enabled = False
      TabOrder = 15
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit2: TCheckBox
      Left = 263
      Top = 282
      Width = 15
      Height = 17
      Caption = 'CheckBox6'
      Enabled = False
      TabOrder = 16
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit1: TCheckBox
      Left = 276
      Top = 282
      Width = 15
      Height = 17
      Caption = 'CheckBox7'
      Enabled = False
      TabOrder = 17
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit0: TCheckBox
      Left = 289
      Top = 282
      Width = 15
      Height = 17
      Caption = 'CheckBox8'
      Enabled = False
      TabOrder = 18
      OnClick = ScrModeBit7Click
    end
    object ScrBarElmSuiv: TCheckBox
      Left = 10
      Top = 181
      Width = 169
      Height = 17
      Caption = 'Affichage barre élément suivant'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 19
      OnClick = ScrBarElmSuivClick
    end
    object ScrFieldName: TEdit
      Left = 60
      Top = 216
      Width = 242
      Height = 21
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 20
      OnChange = ScrFieldNameChange
    end
    object ScrContList: TCheckBox
      Left = 10
      Top = 197
      Width = 111
      Height = 17
      Caption = 'Contient une liste'
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 21
      OnClick = ScrContListClick
    end
    object Edit2: TEdit
      Left = 145
      Top = 158
      Width = 35
      Height = 21
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 22
      Text = '0'
      OnChange = Edit2Change
    end
    object ScrLettre: TUpDown
      Left = 180
      Top = 158
      Width = 12
      Height = 21
      Associate = Edit2
      Enabled = False
      Min = 0
      Max = 34
      Position = 0
      TabOrder = 23
      Wrap = False
      OnClick = ScrLettreClick
    end
    object cbIcons: TComboBox
      Left = 244
      Top = 130
      Width = 57
      Height = 24
      Style = csOwnerDrawFixed
      Enabled = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 18
      ParentFont = False
      TabOrder = 24
      OnClick = cbIconsClick
      OnDrawItem = cbIconsDrawItem
    end
    object ScrModeBit15: TCheckBox
      Left = 93
      Top = 282
      Width = 15
      Height = 17
      Caption = 'ScrModeBit15'
      Enabled = False
      TabOrder = 25
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit14: TCheckBox
      Left = 106
      Top = 282
      Width = 15
      Height = 17
      Caption = 'ScrModeBit14'
      Enabled = False
      TabOrder = 26
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit13: TCheckBox
      Left = 119
      Top = 282
      Width = 15
      Height = 17
      Caption = 'ScrModeBit13'
      Enabled = False
      TabOrder = 27
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit12: TCheckBox
      Left = 132
      Top = 282
      Width = 15
      Height = 17
      Caption = 'ScrModeBit12'
      Enabled = False
      TabOrder = 28
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit11: TCheckBox
      Left = 145
      Top = 282
      Width = 15
      Height = 17
      Caption = 'ScrModeBit11'
      Enabled = False
      TabOrder = 29
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit10: TCheckBox
      Left = 158
      Top = 282
      Width = 15
      Height = 17
      Caption = 'ScrModeBit10'
      Enabled = False
      TabOrder = 30
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit9: TCheckBox
      Left = 171
      Top = 282
      Width = 15
      Height = 17
      Caption = 'ScrModeBit9'
      Enabled = False
      TabOrder = 31
      OnClick = ScrModeBit7Click
    end
    object ScrModeBit8: TCheckBox
      Left = 184
      Top = 282
      Width = 15
      Height = 17
      Caption = 'ScrModeBit8'
      Enabled = False
      TabOrder = 32
      OnClick = ScrModeBit7Click
    end
  end
  object BtnQuitter: TBitBtn
    Left = 12
    Top = 507
    Width = 121
    Height = 25
    Caption = '&Quitter'
    TabOrder = 3
    OnClick = BtnQuitterClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
      03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
      0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
      0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
      0333337F777FFFFF7F3333000000000003333377777777777333}
    NumGlyphs = 2
  end
  object edPath: TEdit
    Left = 271
    Top = 522
    Width = 308
    Height = 21
    Color = clBtnFace
    ReadOnly = True
    TabOrder = 4
    OnDblClick = edPathDblClick
    OnExit = edPathExit
  end
  object rbSize: TRadioGroup
    Left = 159
    Top = 485
    Width = 103
    Height = 43
    Items.Strings = (
      '640x480'
      '800x600')
    TabOrder = 5
  end
  object ScrTree: TTreeView
    Left = 9
    Top = 18
    Width = 256
    Height = 469
    DragMode = dmAutomatic
    HideSelection = False
    Images = ImgLstTree
    Indent = 19
    ReadOnly = True
    TabOrder = 2
    OnChange = ScrTreeChange
    OnCollapsing = ScrTreeCollapsing
    OnDragDrop = ScrTreeDragDrop
    OnDragOver = ScrTreeDragOver
  end
  object cbRedim: TCheckBox
    Left = 158
    Top = 529
    Width = 105
    Height = 17
    Caption = 'Redimensionnable'
    TabOrder = 6
  end
  object ImgLstTree: TImageList
    Left = 12
    Top = 477
    Bitmap = {
      [encoded data, 34112 characters]
      000000000000}
  end
end
